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IN THE SPECinCATION: 

Please amend the Abstract as follows: 

Abstract 

Dates stored in symbolic form in a database are reformatted to permit easy 
manipulation and sorting of date-related information. Each date in M1M2, D1D2, 
and YiY 2 format is converted to QC 2 , YiY 2 , M]M 2 , and DiD 2 format. To 
accomplish the conversion, a 10-decade window starting on YaYb is defined that 
encompasses all dates in the database. The value of CiC 2 is determined by the 
relative values of YiY 2 and Y A Y B . The reformatted date information is particularly 
useful when the reformatting is in CiC 2 YiY 2 M I M 2 DiD 2 format, because sorting by 
date is accomplished using a pure numerical-value sort. 

Please amend the Specification by adding the following to the end of the 
Specification: 



Exhibit A 
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open structure toos:name 'otms_src_dir:tools' 

open #2 : name 'lasMnv.dat', access output 

print " Tools 'Last Inventory Data Format' Check for 1996 Inventory' 1 
print 'Tool No " Model No "; " LASTJNV "LAST INV 



print "====== 

print "Extract Data: 
print #2: "ToolNo 



Model No 



LAST INV 



LAST INV 



print #2: 



print #2: "Extract Data 
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20 extract structure tools 

yy$ = lpad$ (elements (tools (last_inv),3,'7"), 2, "0") 
mm$ = lpad$ (elements (tools (Iast_inv),l/7"), 2, "0") 
5 dd$ = lpadS (elements (tools (last_inv),2,7"), 2, "0") 

cc$= yy$ + "/" + mm$ + dd$ 
cl$ = changes (cc$, 7\ ") 
if cl$[l:2] , '50' then 
c$ = '20' + cl$ 
10 else 

c$= € 19* +cl$ 
end if 

! include c$, '19960101' 

sort by tools(model) 
15 sort by rpad$(c$,8, '0') 

! if c$[l:8] , '19960101' then 

print tools(toolno) ; tab (23); tools(model); & 

tab(35); toos(last_inv); tab(44); c$ 
print #2: tools(toolno) ; tab (23); tools(model); & 
20 tab(35); toos(last_inv); tab(44); c$ 

if valid (cl$, "digits" ) = 0 then 
print; tab(53); " Date format is not digits" 
print #2: ;tab(53); " Date format is not digits" 
end if 

25 ! if valid ( c 1 $, "minlength 6" ) = 0 then 

print; tab(50); " Date format is short" 
print #2: ;tab(50); " Date format is short" 
end if 

i 

if tools(last_inv) = "" then 
30 print; tab(53); " Date format is blank" 

print #2: ;tab(53); " Date format is blank" 
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